home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Prog / M / M2TSkel.cpt / M2TSkel / MultiSkelRgn.def / MultiSkelRgn.def
Encoding:
Modula Definition  |  1986-04-15  |  516 b   |  16 lines  |  [TEXT/MPS ]
  1. DEFINITION MODULE MultiSkelRgn;
  2.  
  3. (*
  4.  *    TransSkel multiple-window demonstration: Region module
  5.  *    
  6.  *    This module handles a window in which the mouse may be clicked and dragged to
  7.  *    draw rectangles.  The rects so drawn are combined into a single region, the
  8.  *    outline of which is drawn.  Rects drawn while the shift key is down are
  9.  *    subtracted from the region.  Double-clicking the mouse clears the display.
  10.  *    If the window is resized, the region will also be resized.
  11.  *)
  12.  
  13. PROCEDURE RgnInit;
  14.  
  15. END MultiSkelRgn.
  16.